VERSION 5.00 Begin VB.Form frmClose BackColor = &H80000012& BorderStyle = 1 'Fixed Single Caption = "Close" ClientHeight = 1575 ClientLeft = 4335 ClientTop = 2685 ClientWidth = 1770 Icon = "frmClose.frx":0000 LinkTopic = "Form1" MaxButton = 0 'False MinButton = 0 'False ScaleHeight = 1575 ScaleWidth = 1770 Begin VB.CommandButton cmdDone Caption = "Done" Height = 375 Left = 120 TabIndex = 1 Top = 960 Width = 1455 End Begin VB.Label Label1 BackColor = &H80000012& Caption = " This command closes the current session of DoorWays." ForeColor = &H000000FF& Height = 735 Left = 120 TabIndex = 0 Top = 120 Width = 1695 End Attribute VB_Name = "frmClose" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Private Sub cmdDone_Click() frmClose.Hide frmFile.Show End Sub